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EXECUTIVE  SUMMARY 


The  Validation  Summary  Report  presents  the  results  and  con¬ 
clusions  of  testing  performed  on  the  TeleSof t_Ada ,  Version 
3.7.  Standardized  tests  serve  as  input  to  an  Ada  compiler, 
producing  results  which  are  evaluated  by  the  validation 
team.  This  summary  briefly  states  the  highlights  of  the 
TeleSof t_Ada ,  Version  3.7,  validation. 

On-site  testing  was  performed  86-04-11  through  86-04-21  at 
Nynashamn  under  the  auspices  of  the  IABG  m.b.H.,  Dept  SZT 
( AVF ) ,  according  to  Ada  Validation  Office  policies  and  pro¬ 
cedures.  The  TeleSoft  Ada,  Version  3.7,  is  hosted  on  Sun 
2-120  operating  under  Sun  2.0.  The  suite  of  tests  known  as 
the  Ada  Compiler  Validation  Capability  (ACVC),  Version  1.7, 
was  used.  The  ACVC  is  used  to  validate  conformance  of  a 
compiler  to  ANSI/MIL-STD-1 8 1 5A  Ada.  The  purpose  of  testing 
is  to  ensure  that  a  compiler  properly  implements  legal 
language  constructs  and  that  it  identifies  and  rejects  ille¬ 
gal  language  constructs.  The  testing  also  identifies 
behavior  that  is  implementation  dependent  but  permitted  by 
the  Ada  Standard.  Six  classes  of  tests  are  used.  These 
tests  are  designed  to  perform  checks  at  compile  time,  at 
link  time,  or  during  execution. 

The  results  of  validation  are  summarized  in  the  following 
table . 

RESULT  TEST  CLASS  TOTAL 

A  B  C  D  E  L 


Passed  66  821  1023  17  9  21  1957 

Failed  000000  0 

Inapplicable  2  3  297  022  306 

Anomalous  000000  0 

Withdrawn  0  412  0  0  0  16 

TOTAL  68  828  1332  17  11  23  2279 


Tests  found  to  contain  errors  were  withdrawn  from  Version 
1.7  of  the  Ada  Compiler  Validation  Capability  (ACVC).  When 
validation  was  completed,  the  tests  listed  in  Chapter  2.2 
had  been  withdrawn. 

One  additional  test  had  been  withdrawn  when  prevalidation 
was  completed.  This  is  taken  into  account  in  the  final 
tables . 


Some  tests  demonstrate  that  language  features  are  not  sup¬ 
ported  by  an  implementation.  For  this  implementation  the 
tests  determined  the  following. 


.  SHORT_INTEGER  is  not  supported: 

B5  2004E-AB. DEP  B5  5B09D-AB. DEP  B36001 CR-AB . DEP 
C34001D-B . DEP  C55B07B-AB . DEP 

.  LONG__ INTEGER  is  supported: 

B52004D-AB. DEP  B5 5B09C-AB . DEP  B86001CS-AB. DEP 

C34001E-B. DEP  C5 5B07A-AB . DEP 

.  SHORT_FLOAT  is  not  supported: 

B86001CP-AB .DEP  C34001 F-B . DEP  C3  5702A-AB . DEP 

.  LONG_FLOAT  is  not  supported: 

B8600 1 CQ-AB . DEP  C34001G-B . DEP  C35702B-AB . DEP 

.  Representation  specifications  for  noncontiguous 
enumeration  representations  are  not  allowed: 

C55B16A-AB.DEP 
B8600 1 DT-AB . TST 

.  The  only  predefined  numeric  types  are  INTEGER, 

FLOAT,  LONG_ INTEGER : 

.  The  package  SYSTEM  is  used  by  package  TEXT_IO: 
C86001F-B . DEP 

.  The  'SIZE  clause  is  not  supported: 

C87B62A-3 . DEP 

.  The  ' STORAGE_SIZE  clause  is  not  supported: 
C87B62B-B.DEP 

.  The  ‘SMALL  clause  is  not  supported: 

C87B62C-B.DEP 

.  Generic  subroutine  declarations  and  bodies  cannot 
be  compiled  in  separate  compilation  units: 

CA101 2A-B.DEP 

.  Generic  package  bodies  cannot  be  compiled  in  separate 
compilation  files: 


CA2009C-B .DEP 


Generic  subprogram  bodies  cannot  be  compiled  in 
separate  compilation  files: 

CA2009F-B . DEP 

Pragma  INLINE  is  not  supported  for  procedures: 

LA3004A-AB .ADA  CA3004E-B . ADA 

El 3004C-B .ADA 

Pragma  INLINE  is  not  supported  for  functions: 

LA3004B-AB . ADA  CA3004F-B . ADA 

EA3004D-B .ADA 

Mode  IN_FILE  is  supported  (for  sequential  I/O): 
CE21 02D-B . ADA 

Mode  OUT_FILE  is  supported  (for  sequential  I/O) 
CE21 02E-B .ADA 

‘lode  INOUT_FILE  is  supported  (for  direct  I/O): 
CE21 02F-B .ADA 

Mode  RESET  and  DELETE  are  supported 
(for  sequential  and  direct  I/O): 

CE2 1 02G-B . ADA 

Mode  IN_FILE  is  supported  (for  direct  I/O): 
CE2102I-B. ADA 

Mode  OUT_FILE  is  supported  (for  direct  I/O): 
CE21 02J-B. ADA 

Dynamic  creation  and  deletion  of  files  are 
al lowed : 

CE2106A-B.DEP  CE3 1 1 OA-B . ADA 

More  than  one  internal  file  can  be  associated 
with  the  same  external  file: 

CE21 073-B.ADA  CE2 1 07C-B . ADA 
CE2107D-B . ADA  CE2 1 1 1 D-B . ADA 
CE31 1 1B-B.ADA  CE3 111 C-B .ADA 
CE3 1 1 4B-B .ADA 

Instantiation  of  package  SEQUENTIAL  10  with 


unconstrained  array  types  is  not  allowed: 

CE2201 D-B . DEP 

.  Instantiation  of  package  SEQUENTIAL_IO  with 
unconstrained  record  types  with  discriminants 
is  not  allowed: 

CE2201E-B .DEP 

.  Dynamic  creation  and  resetting  of  files  is  supported: 
CE221 OA-B .ADA 

.  Instantiation  of  package  DIRECT  10  with  unconstrained 
array  types  and  unconstrained  types  with  discriminants 
is  not  supported: 

CE2  40 1 D-B . DEP 

.  An  external  file  associated  with  more  than  one  internal 
file  can  be  reset: 

CE31 15A-B.DEP 

.  Illegal  filenames  can  exist: 

CE2 1 02C-B . DEP 

AC VC  Version  1.7  was  taken  on-site  via  magnetic  tape  to 
Nynashamn.  The  tape  was  loaded,  and  all  tests,  except  for 
the  executable  tests  which  make  use  of  a  floating  point  pre¬ 
cision  greater  than  SYSTEM.MAX_DIGITS,  were  compiled  on  Sun 
2-120.  Class  A,  C,  D,  and  E  tests  were  executed  on  Sun  2- 
1  20. 

On  completion  of  testing,  all  results  were  analyzed  for 
failed  Class  A,  C,  D,  or  E  programs,  and  all  Class  B  and  L 
compilation  results  were  individually  analyzed. 

The  ACVC ,  Version  1.7,  contains  2279  tests  of  which  1957 
were  applicable  to  TeleSoft  Ada,  Version  3.7.  No  anomalies 
were  found  in  the  testing  of  this  compiler.  Testing  demon¬ 
strated  that  all  applicable  tests  were  passed  by  this  com¬ 
piler  and  conformed  to  the  Ada  Standard.  The  AVF  concluded 
that  the  results  show  acceptable  compliance  to  ANSI/MIL- 
STD-181 5A  Ada . 
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CHAPTER  1 


INTRODUCTION 


The  Validation  Summary  Report  describes  how  an  Ada  compiler 
conforms  to  the  language  standard.  This  report  explains  all 
technical  terms  used  within  and  thoroughly  reports  the  Ada 
Compiler  Validation  Capability  (ACVC)  test  results.  Ada 
compilers  must  be  written  according  to  the  language  specifi¬ 
cation  as  given  in  the  ANSI/MIL-STD-1 81 5A  Ada.  All 
implementation-defined  features  must  be  included  for  the 
compiler  to  conform  to  the  Standard.  Following  the  guide¬ 
lines  of  the  Standard  ensures  continuity  between  compilers. 
That  is,  the  entire  Standard  must  be  implemented,  and  noth¬ 
ing  can  be  implemented  that  is  not  in  the  Standard. 

Even  though  all  validated  Ada  compilers  conform  to  the  Stan¬ 
dard,  it  must  be  understood  that  some  differences  do  exist 
between  implementat ions .  ANSI/MIL-STD-1 81 5A  permits  some 
implementation  dependencies,  e.g.,  the  maximum  length  of 
identifiers,  the  maximum  values  of  integer  types,  etc. 
These  implementation-dependent  features  limit  the  portabil¬ 
ity  of  programs  between  compilers.  Other  differences 
between  compilers  are  due  to  limitations  imposed  on  a  com¬ 
piler  by  the  operating  system  and  by  the  hardware.  All  of 
these  dependencies  are  given  in  the  report. 

Validation  summary  reports  are  written  according  to  a  stand¬ 
ardized  format.  Compiler  users  can,  therefore,  more  easily 
compare  the  reports  from  several  compilers  when  selecting  a 
compiler  for  a  given  task.  The  validation  report  can  be 
completed  mostly  from  the  test  results  produced  during  vali¬ 
dation  testing.  Additional  testing  information  is  given  at 
the  end  of  the  report  and  states  problems  and  details  which 
are  unique  for  a  specific  compiler.  The  format  of  the  vali¬ 
dation  report  limits  variance  between  reports,  enhances  rea¬ 
dability  of  the  report,  and  accelerates  report  readiness. 


1  INTRODUCTION 

1.1  Purpose  of  this  Validation  Summary  Report 

The  Validation  Summary  Report  documents  the  results  of  the 
testing  performed  on  an  Ada  compiler.  Testing  was  carried 
out  for  the  following  purposes: 

.  To  identify  any  language  constructs  supported  by  the 
translator  that  do  not  conform  to  the  Ada  Standard 


3.  Ada  Compiler  Val idation  Implementer 1 s 
Guide,  SofTech,  Inc.,  Dec  1984. 


1.4  DEFINITION  OF  TERMS 

Anomaly  A  test  result  that,  given  pre-validation 

analysis,  is  not  expected  during  formal  vali¬ 
dation  but  is  judged  allowable  under  the  cir¬ 
cumstances  . 

ACVC  The  Ada  Compiler  Validation  Capability.  A  set 

of  programs  that  evaluates  the  conformance  of 
a  compiler  to  the  Ada  language  specification, 
ANSl/MIL— STD-1  81 5A. 

Ada  Standard  AMSI/MIL-STD-I 81 5A,  February  1983. 

Applicant  The  agency  requesting  validation. 

AVF  The  IABG  m.b.H.,  Dept  SZT.  In  the  context  of 

this  report,  the  AVF  is  responsible  for  con¬ 
ducting  compiler  validations  according  to 
established  policies  and  procedures. 

AVO  The  Ada  Validation  Office.  In  the  context  of 

this  report,  the  AVO  is  responsible  for  set¬ 
ting  policies  and  procedures  for  compiler 
val idations . 

Compiler  A  processor  for  the  Ada  language.  In  the  con¬ 

text  of  this  report,  a  compiler  is  any 
language  processor,  including  cross-compilers, 
translators,  and  interpreters. 

Failed  test  A  test  for  which  the  compiler  generates  a 

result  that  demonstrates  nonconformance  to  the 
Ada  Standard. 

Host  The  computer  on  which  the  compiler  resides. 

Inapplicable  A  test  that  uses  features  of  the  language  that 

test  a  compiler  is  not  required  to  support  or  may 

legitimately  support  in  a  way  other  than  the 
one  expected  by  the  test. 

Passed  test  A  test  for  which  a  compiler  generates  the 

expected  result. 


Target 


The  computer  for  which  a  compiler  generates 
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Test 


A  program  that  evaluates  the  conformance  of  a 
compiler  to  a  language  specification.  In  the 
context  of  this  report,  the  term  is  used  to 
designate  a  single  ACVC  test.  The  text  of  a 
program  may  be  the  text  of  one  or  more  compi¬ 
lations  . 


Withdrawn  A  test  that  has  an  invalid  test  objective, 

test  fails  to  meet  its  test  objective,  or  contains 

illegal  use  of  the  language. 


1 . 5  Configuration 

The  candidate  compilation  system  for  this  validation  was 
tested  under  the  configuration: 


Compiler:  TeleSof t_Ada ,  Version  3.7 

Test  Suite:  Ada  Compiler  Validation  Capability,  Version  1.7 
Host  Computer: 


Two  Machines: 


Sun  2-120 


Operating  System: 
Memory  Size: 

Disk  System: 


Sun  2.0 
3  MB 
Sun  2.0 


Target  Computer: 

Same  as  host  computer 


The  two  SUN  computers  are  connected  to  a  disk  system,  a 
VAX/UNIX,  and  a  tape  drive  via  Ethernet.  One  of  the  two  SUN 
computers  acts  as  a  file  server  for  both  SUN  computers.  The 
VAX/UNIX  system  was  used  for  printing  of  results  only. 
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CHAPTER  2 
TEST  RESULTS 


2.1  ACVC  Test  Classes 

Conformance  to  ANSI/MIL-STD-1 81 5A  is  measured  using  the  Ada 
Compiler  Validation  Capability  (ACVC).  The  ACVC  contains 
both  legal  and  illegal  Ada  programs  structured  into  six  test 
classes:  A,  B,  C,  D,  E,  and  L.  Legal  programs  are  compiled 
and  executed  while  illegal  programs  are  just  compiled.  Sup¬ 
port  packages  are  used  to  report  the  results  of  the  legal 
programs.  A  compiler  must  correctly  process  each  of  the 
tests  in  the  suite  and  demonstrate  conformance  to  the  Ada 
Standard  by  either  meeting  the  pass  criteria  given  for  the 
test  or  by  showing  that  the  test  is  inapplicable  to  the 
implementation.  Tests  that  are  found  to  contain  errors  are 
withdrawn  from  the  ACVC.  The  results  of  validation  testing 
are  summarized  in  the  following  table: 


RESULT 

A 

B 

TEST 

C 

CLASS 

D 

E 

L 

TOTAL 

Passed 

66 

821 

1023 

17 

9 

21 

1957 

Failed 

0 

0 

0 

0 

0 

0 

0 

Inapplicable 

2 

3 

297 

0 

2 

2 

306 

Anomalous 

0 

0 

0 

0 

0 

0 

0 

Withdrawn 

0 

4 

1  2 

0 

0 

0 

16 

TOTAL 

68 

828 

1  332 

17 

1 1 

23 

2279 

A  total  of  1993  te 

sts  we 

re  processed  dur 

ing 

this 

valida 

attempt,  including  7  passed  tests  for  the  report  package,  28 
not  applicable  tests  and  1  test  withdrawn  after  86-02-04. 
The  15  tests  in  Version  1.7  withdrawn  until  86-02-04  were 
not  processed,  nor  were  278  Class  C  tests  that  were  inappli¬ 
cable  because  they  use  floating  point  types  having  digits 
that  exceed  the  maximum  value  for  the  implementation.  All 
other  tests  were  processed. 

Some  conventions  are  followed  in  the  ACVC  to  ensure  that  the 
tests  are  reasonably  portable  without  modification.  For 
example,  the  tests  make  use  of  only  the  basic  55  character 
set,  contain  lines  with  a  maximum  length  of  72  characters, 
use  small  numeric  values,  and  place  features  that  may  not  be 
supported  in  separate  tests.  However,  some  tests  contain 
values  that  require  the  test  to  be  customized  according  to 
implementation-specific  values.  The  values  used  for  this 
validation  are  listed  in  Appendix  B. 


2.1.1  Class  A  Tests 

Class  A  tests  check  that  legal  Ada  programs  can  be  success¬ 
fully  compiled  and  executed.  However,  no  checks  are  per¬ 
formed  during  execution  to  see  if  the  test  objective  has 
been  met.  For  example,  a  Class  A  test  checks  that  reserved 
words  of  another  language  {other  than  those  already  reserved 
in  the  Ada  language)  are  not  treated  as  reserved  words  by  an 
Ada  compiler.  A  Class  A  test  is  passed  if  no  errors  are 
detected  at  compile  time  and  the  program  executes  to  produce 
a  message  indicating  that  it  has  passed.  If  a  Class  A  test 
cannot  be  compiled  and  executed  because  of  its  size,  then 
the  test  is  split  into  a  set  of  smaller  subtests  that  can  be 
processed.  No  splits  were  required. 


The  following  table  shows  that  all  applicable  Class  A  tests 
passed : 


RESULT 


CHAPTER 
7  8  9 


10  11  12  14  TOTAL 


Passed 


Failed 


Inapplicable 


Anomalous 


Withdrawn 


TOTAL 


2.1.2  Class  B  Tests 


Class  B  tests  check  that  a  compiler  detects  illegal  language 
usage.  Class  B  tests  are  not  executable.  Each  test  in  this 
class  is  compiled  and  the  resulting  compilation  listing  is 
examined  manually  to  verify  that  every  syntax  or  semantic 
error  in  the  test  is  detected.  A  Class  B  test  is  passed  if 
every  illegal  construct  that  it  contains  is  detected  by  the 
compiler.  If  one  or  more  errors  are  not  detected,  then  a 
version  of  the  test  is  created  that  contains  only  the 
undetected  errors.  The  resulting  "split"  is  compiled  and 
examined.  The  splitting  process  continues  until  all  errors 
are  detected  by  the  compiler.  Splits  were  required  for  11 
tests  : 


B71001E 

B71001Q 

371001V; 

B97101E 


BA1101C4  BA3013A6 

BA3006A6M 

BA3006B3 

BA3007B7 

BA3008A4 

BA3008B5 


The  following  table  shows  that  all  applicable  Class  B  tests 
passed : 


RESULT  CHAPTER 

2  3  4  5  6  7  8  91011  1214  TOTAL 


Passed  39 
Fa i 1 ed  0 
Inapplicable  0 
Anomalous  0 
Withdrawn  0 
TOTAL  39 


86  86  111  73 

0  0  0  0 

0  0  2  0 

0  0  0  0 

0  10  0 
86  87  113  73 


67  50  87  36 

0  0  0  0 
0  10  0 
0  0  0  0 
0  10  1 
67  52  87  37 


8  160  18  821 

0  0  0  0 

0  0  0  3 

0  0  0  0 

0  10  4 

8  161  18  828 


2.1.3  Class  C  Tests 

Class  C  tests  check  that  legal  Ada  programs  can  be  correctly 
compiled  and  executed.  Each  Class  C  test  is  self-checking 
and  produces  a  PASS/FAIL  message  indicating  the  result  when 
it  is  executed.  If  a  Class  C  test  cannot  be  compiled 
because  it  exceeds  the  compiler's  capacity,  then  the  test  is 
split  into  smaller  subtests  until  all  are  compiled  and  exe¬ 
cuted.  No  splits  were  required. 


The  following  table  shows  that  all  applicable  Class  C  tests 
oassed : 


RESULT 


CHAPTER 

7  8  9  10  11  12  14  TOTAL 


Passed 


37  89  162  117  82  18  93  109  39  20  56  201 


Failed 


000000000000 


Inapplicable 


23  120  140  200405003 


Anomalous 


000000000000 


Withdrawn 


01  3000025001 


TOTAL 


60  210  305  119  82  18  97  111  49  20  56  205 
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2.1.4  Class  D  Tests 

Class  D  tests  check  the  compilation  and  execution  capacities 
of  a  compiler.  Since  there  are  no  requirements  placed  on  a 
compiler  by  the  Ada  Standard  for  the  number  of  identifiers 
permitted  in  a  compilation,  the  number  of  units  in  a 
library,  the  number  of  nested  loops  in  a  subprogram  body, 
and  so  on,  a  compiler  may  refuse  to  compile  a  Class  D  test. 
Each  Class  D  test  is  sel f -checking  and  produces  a  PASS/FAIL 
message  indicating  the  result  when  it  is  executed.  If  a 
Class  D  test  fails  to  compile  because  the  capacity  of  the 
compiler  is  exceeded,  then  the  test  is  classified  as  inap¬ 
plicable  . 

The  following  table  shows  that  all  applicable  Class  D  tests 
passed : 


RESULT 


2 


3  4  5 


6 


f 

CHAPTER  j 

7  8  9  10  11  12  14  TOTAL 


Passed 

1 

0 

4 

9 

3 

0 

0 

0 

0 

0 

0 

0 

17 

Failed 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

Inapplicable 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

Anomalous 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

Withdrawn 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

TOTAL 

1 

0 

4 

9 

3 

0 

0 

0 

0 

0 

0 

0 
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Capacities  measured  by  the 
section  2.4,  IMPLEMENTATION 

Class  D 
CHARACT 

tests 

ERISTICS 

are 

• 

detailed 

in 

2.1.5  Class  E  Tests 


Class  E  tests  provide  information  about  the  compiler  in 
those  areas  in  which  the  Ada  Standard  permits  implementa¬ 
tions  to  differ.  Each  Class  E  test  is  executable  and  pro¬ 
duces  messages  that  indicate  how  the  Ada  Standard  is  inter¬ 
preted.  However,  in  some  cases  the  Ada  Standard  permits  a 
compiler  to  detect  a  condition  either  at  compile  time  or  at 
execution  time,  and  thus  a  Class  E  test  may  correctly  fail 
to  execute.  A  Class  E  test  is  passed  if  it  fails  to  compile 
and  appropriate  error  messages  are  issued,  or  if  it  executes 
properly  and  produces  a  message  that  it  has  passed.  If  a 
Class  E  test  cannot  be  compiled  and  executed  because  of  its 
size,  then  the  test  is  split  into  a  set  of  smaller  subtests 
that  can  be  processed.  No  splits  were  required. 

The  following  table  shows  that  all  applicable  Class  E  tests 
passed : 

RESULT  CHAPTER 

2  3  4  5  6  7  8  910111214  TOTAL 


Passed  132110000001  9 

Failed  000000000000  0 

Inapplicable  000000002000  2 

Anomalous  000000000000  0 

Withdrawn  000000000000  0 

TOTAL  1  321  10002001  11 


Information  obtained  from  the  Class  E  tests  is  detailed  in 
section  2.4,  IMPLEMENTATION  CHARACTERISTICS. 


2.1.6  Class  L  Tests 


Class  L  tests  check  that  incomplete  or  illegal  Ada  programs 
involving  multiple,  separately  compiled  units  are  detected 
and  not  allowed  to  execute.  Class  L  tests  are  compiled 
separately  and  execution  is  attempted.  A  Class  L  test 
passes  if  it  is  rejected  at  link  time  and  the  test  does  not 
execute. 

The  following  table  shows  that  all  applicable  Class  L  tests 
passed : 

RESULT  CHAPTER 

2  3  4  5  6  7  8  910111214  TOTAL 


Passed  00000000  21  000  21 

Failed  000000000000  0 

Inapplicable  000000002000  2 

Anomalous  000000000000  0 

Withdrawn  000000000000  0 


TOTAL 


00000000  23  000 


23 
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2.1.7  Support  Units 

Three  packages  support  the  self-checking  features  of  Class  C 
tests:  REPORT,  CHECK_FILE,  and  VAR_STRINGS .  The  REPORT  pack¬ 
age  provides  the  mechanism  by  which  executable  tests  report 
results.  It  also  provides  a  set  of  identity  functions  that 
are  used  to  defeat  some  compiler  optimization  strategies  to 
cause  computations  to  be  made  by  the  target  computer  instead 
of  the  by  the  compiler  on  the  host  computer.  The  CHECK_FILE 
package  is  used  to  check  the  contents  of  text  files  written 
by  some  of  the  Class  C  tests  for  Chapter  14  of  the  Ada  Stan¬ 
dard.  The  VAR_STRINGS  package  defines  types  and  subprograms 
for  manipulating  vary ing-length  character  strings.  The 
operation  of  these  three  packages  is  checked  by  a  set  of 
executable  tests.  These  tests  produce  messages  that  are 
examined  manually  to  verify  that  the  packages  are  operating 
correctly.  If  these  packages  are  not  operating  correctly, 
then  validation  is  not  attempted. 

An  applicant  is  permitted  to  substitute  the  body  of  package 
REPORT  with  an  equivalent  one  if  for  some  reason  the  origi¬ 
nal  version  provided  by  the  ACVC  cannot  be  executed  on  the 
target  computer.  Package  REPORT  was  modified  for  this  vali¬ 
dation  in  order  to  print  the  date  and  time  of  execution. 

All  support  package  specifications  and  bodies  were  compiled 
and  were  demonstrated  to  be  operating  correctly. 


.  /.  /, 
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2.2  Withdrawn  Tests 


Some  tests  are  withdrawn  from  the  ACVC  because  they  do  not 
conform  to  the  Ada  Standard.  Vtfhen  preparing  the  tape  for  on 
site  validation  15  tests  had  been  withdrawn,  When  testing 
was  performed  another  test  had  been  withdrawn  (C940ACA). 
Therefore,  it  was  run  as  will  but  its  result  was  ignored.  In 
total,  16  tests  had  been  withdrawn  for  the  reasons  indi¬ 
cated  : 


C35904A:  The  elaboration  of  subtype  declarations  SFX3  ?,  SFX4 

nag  raise  NUMER I C_ERROR  vs.  CGNSTRA I NT_ERROR . 

C414G4A:  The  values  of  'LAST  and  'LENGTH  in  the  "if"  statements 

from  line  74  to  the  end  of  the  test  are  incorrect 

C4300GA:  This  test  requires  that  the  evaluation  of  default 
initial  values  not  occur  if  an  exception  is  raised  by  an 
allocator.  However,  the  LHC  has  ruled  that  such  a 
requirement  is  incorrect  (AI-00397). 

34A010C:  The  ob tec t_dec lara t i on  in  line  18  follows  a  subprogram 

body  of  the  same  declarative  part. 

C4A014A.  The  number  declarations  in  lines  19-22  are  not 
correct,  because  conversions  are  not  static. 

3S3AC6B.  The  Ada  Standard  8.3(17)  and  AI-00330  permit  the  label 

LAB_EN'JMERAL  of  line  80  to  be  considered  a  homograph  of 
the  enumeration  literal  in  line  25. 

C920C5A:  At  line  40,  "/  =  "  for  type  PACK.  BIG  INT  is  not  visible 

without  a  '‘use''  clause  for  pac kag e~PACK 


C940ACA;  This  test  assumes  that  allocated  task  TT1  will  run  prior  to 
the  main  program,  and  thus  assign  5PYNUMB  the  value  checked 
for  by  the  main  program;  however,  such  an  execution  order  i? 
not  required  by  the  Ada  Standard,  so  the  test  is  erroneous 

CA10G33'  This  test  requires  all  of  the  legal  compilation  units 

of  a  file  containing  some  illegal  units  to  be  compiled 
and  executed.  But  according  to  AI-00255  such  a  file  mag 
be  re jected  as  a  whole. 

0A2OO1E:  The  Ada  Standard  10.2(5)  states  that  "simple  names 

of  all  subunits  that  have  the  same  ancestor  library  unit 
must  be  distinct  identifiers."  This  test  checks  for  the 
above  condition  when  stubs  are  declared;  but  it  is  not 
clear  that  the  check  must  be  made  then,  as  opposed  to 
when  the  subunit  is  compiled. 

CA3QQ5A . . D  (4  tests)  There  exists  no  valid  elaboration  order 
for  these  tests. 

3C3204C  The  file  3C3204C4  should  contain  the  body  for  BC3204C0 
— as  indicated  in  line  25  of  BC3204C3M. 

CE2107E  TEMP_H.4S_NAME  must  be  given  an  initial  value  of  TRUE 


2.3  Inapplicable  Tests 


Some  tests  do  not  apply  to  all  compilers  because  they  make 
use  of  features  that  a  compiler  is  not  required  by  the  Ada 
Standard  to  support.  Others  may  depend  on  the  result  of 
another  test  that  is  either  inapplicable  or  withdrawn.  For 
this  validation  attempt,  306  tests  were  inapplicable  for  the 
reasons  indicated: 


The  testname  indications  ending  in  C-Y,  respectively  C-Z 
cover  a  number  of  23,  respectively  24  tests. 


AE2101C 

AE2101H 

B52004E 

B55B09D 

B86001DT 

C2411 3C-Y 

C34001D 

C34001F 

C34001G 

C35702A 

C35702B 

C35705C-Y 

C35706C-Y 

C35707C-Y 

C35708C-Y 

C35802C-Y 

C45241C-Y 

C45321C-Y 

C45421C-Y 

C45424C-Y 

C45521C-Z 

C45621C-Z 

C55B07B 

C55B16A 

C86001F 
C87B62A 
"C87B62B 
C87B62C 
CA1 0] 2A 

CA2009C 

CA2009F 

CA3004E 

CA3004F 

CE2201D 


Instantiation  of  I/O  package  with  unconstrained 
array  type  not  allowed 

Instantiation  of  I/O  package  with  unconstrained 

array  type  not  allowed 

type  SHORT_INTEGER  not  supported 

type  SHORT_INTEGER  not  supported 

no  valid  macro  expansion  possible 

Digits  7-29 

type  SHORT_INTEGER  not  supported 

type  SHORT_FLOAT  not  supported 

type  LONG_FLOAT  not  supported 

type  SHORT_FLOAT  not  supported 

type  LONG_FLOAT  not  supported 

Digits  7-29 

Digits  7-29 

Digits  7-29 

Digits  7-29 

Digits  7-29 

Digits  7-29 

Digits  7-29 

Digits  7-29 

Digits  7-29 

Digits  7-30 

Digits  7-30 

type  SHORT_INTEGER  not  supported 
No  representation  clause  for  noncontiguous 
enumeration  types 

package  TEXT_I0  uses  package  SYSTEM 
Representation  clause  'SIZE  not  supported 
Representation  clause  ' STORAGE_SIZE  not  supported 
Representation  clause  'SMALL  not  supported 
Separately  compiled  generic  specifications  and 
bodies  not  allowed 

Separately  compiled  generic  specifications  and 
bodies  not  allowed 

Separately  compiled  generic  specifications  and 
bodies  not  allowed 
Inline  pragmas  ignored 
Inline  pragmas  ignored 

Instantiation  of  I/O  package  with  unconstrained 
array  type  not  allowed 
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CE2201E  Instantiation  of  I/O  package  with  unconstrained 

array  type  not  allowed 

CE2401D  Instantiation  of  I/O  package  with  unconstrained 

array  type  not  allowed 
EA3004C  Inline  pragmas  ignored 

EA3004D  Inline  pragmas  ignored 

LA3004A  Inline  pragmas  ignored 

LA3004B  Inline  pragmas  ignored 
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2.4  Implementation  Characteristics 


One  of  the  purposes  of  validation  is  to  determine  the 
behavior  of  a  compiler  in  those  areas  of  the  Ada  Standard 
that  permit  implementations  to  differ.  Class  D  and  E  tests 
specifically  check  for  such  implementation  differences. 
However,  inapplicable  tests  in  other  classes  also  character¬ 
ize  an  implementation.  This  compiler  is  characterized  by 
the  following  interpretations  of  the  Ada  Standard: 

.  Non-graphic  characters. 

Non-graphic  characters  are  defined  in  the  ASCII  char¬ 
acter  set  but  are  not  permitted  in  Ada  programs,  even 
within  character  strings.  The  compiler  correctly 
recognizes  these  characters  as  illegal  in  Ada  compila¬ 
tions.  The  characters  are  contained  in  the  output 
listing  but  are  not  visible  if  printed  except  for  some 
of  the  format  effectors  which  have  a  visible  effect. 

.  Capacities. 

The  compiler  correctly  processes  compilations  contain¬ 
ing  loop  statements  nested  to  65  levels,  block  state¬ 
ments  nested  to  65  levels,  procedures  nested  to  17 
levels,  and  723  variables. 

.  Universal  integer  calculations. 

An  implementation  is  allowed  to  reject  universal 
integer  calculations  having  values  that  exceed 
SYSTEM .MAX_INT .  This  implementation  does  not  reject 
such  calculations  and  processes  them  correctly. 

.  Universal  real  calculations. 

An  implementation  is  allowed  to  reject  universal  real 
calculations  having  values  that  exceed  certain  preci¬ 
sions.  This  implementation  does  not  reject  such  cal¬ 
culations  and  processes  them  correctly. 

.  Predefined  types. 

This  implementation  supports  the  predefined  type 
LONG_INTEGER.  It  does  not  support  any  other  predefined 
numeric  types  except  those  required  by  the  language. 

.  Based  literals. 

An  implementation  is  allowed  to  reject  a  based  literal 
with  value  exceeding  SYSTEM. MAX  IN?  during  compilation 
or  it  may  raise  NUMERIC_ERROR  during  execution.  This 
compiler  raises  NUMERIC  ERROR  during  execution. 


■  „■ 
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Array  types. 


An  implementation  is  allowed  to  raise  NUMERIC  ERROR 
for  an  array  having  a  'LENGTH  that  exceeds 
STANDARD.  INTEGER' LAST  and/or  SYSTEM . MAX_INT .  When  an 
array  type  is  declared  with  an  index  range  exceeding 
INTEGER  values  and  with  a  component  that  is  a  null 
BOOLEAN  array,  this  compiler  does  not  raise  any  excep¬ 
tions  . 

Vihen  an  array  type  is  declared  with  an  index  range 
exceeding  SYSTEM. MAX_INT  values  and  with  a  component 
that  is  a  null  BOOLEAN  array,  this  compiler  does  not 
raise  any  exceptions. 

A  packed  BOOLEAN  array  of  length  INTEGER  LAST+ 3  and  a 
packed  two-dimensional  BOOLEAN  array  with 
INTEGER_LAST+ 3  components  may  be  declared  and  used 
without  raising  exceptions. 

Null  arrays  with  one  dimension  of  length  exceeding 
INTEGER' LAST  may  be  declared  and  assigned  without 
raising  exceptions. 

In  assigning  one-dimensional  array  types,  the  entire 
expression  is  evaluated  before  CONSTRAINT  ERROR  is 
raised  when  checking  whether  the  expression’s  subtype 
is  comptaible  with  the  target’s  subtype.  In  assigning 
two-dimensional  array  types,  the  entire  expression  is 
not  evaluated  before  CONSTRAINT_ERROR  is* raised  when 
checking  whether  the  expression’s  subtype  is  compati¬ 
ble  with  the  target's  subtype.  In  assigning  record 
types  with  discriminants,  the  entire  expression  is 
evaluated  before  CONSTRAINT_ ERROR  is  raised  when 
checking  whether  the  expression's  subtype  is  compati¬ 
ble  with  the  target's  subtype. 

Discriminated  types. 

An  incompletely  declared  type  with  discriminants  may 
be  used  in  an  access  type  definition  and  constrained 
either  there  or  in  later  subtype  indications. 

Aggregates . 

>/hen  evaluating  the  choices  of  a  multi-dimensional 
aggregate  the  order  in  which  choices  are  evaluated  and 
index  subtype  checks  are  made  depends  upon  the  aggre¬ 
gate  itself. 

'■/hen  evaluating  an  aggregate  containing  subaggregates, 
not  all  choices  are  evaluated  before  being  checked 
for  identical  bounds. 


Representation  clauses 


'SMALL  length  clauses  are  not  supported. 

Enumeration  representation  clauses  are  not  supported. 
Generics 

S/hen  given  a  separately  compiled  generic  declaration 
some  illegal  instantiations  and  a  body,  the  compiler 
rejects  the  body  because  it  is  not  in  the  same  compi¬ 
lation  as  its  declaration. 

Package  CALENDAR. 

TIME_OF  and  SPLIT  are  inverses  when  SECONDS  is  a  non¬ 
model  number. 

Pragmas . 

Pragma  INLINE  is  not  supported  for  procedures.  It  is 
not  supported  for  functions. 

Input/output . 

Package  SEQUENTIAL_IO  cannot  be  instantiated  with 
unconstrained  array  types  and  record  types  with 
discriminants.  Package  DIRECT_IO  cannot  be  instan¬ 
tiated  with  unconstrained  array  types  and  record  types 
with  discriminants  without  defaults. 

More  than  one  internal  file  can  be  associated  with 

each  external  file  for  sequential  I/O  for  both  reading 

and  writing.  An  external  file  associated  with  more 
than  one  internal  file  can  be  deleted. 

More  than  one  internal  file  can  be  associated  with 

each  external  file  for  direct  I/O  for  both  reading  and 

writing.  An  external  file  associated  with  more  than 
one  internal  file  can  be  deleted. 

More  than  one  internal  file  can  be  associated  with 
each  external  file  for  text  I/O  for  both  reading  and 
writing.  An  external  file  associated  with  more  than 
one  internal  file  can  be  deleted. 

An  existing  text  file  can  be  opened  in  OUT_FILE  mode, 
can  be  created  in  OUT_FILE  mode,  and  can  be  created  in 
IN  FILE  mode. 


Dynamic  creation  and  reset 
allowed . 


g  of  a  sequential  file  is 


Temporary  sequential  files  are  given  a  name.  Tem¬ 
porary  direct  files  are  given  a  name.  Temporary  files 
given  names  are  not  deleted  when  they  are  closed.  They 
are  however  deleted  when  the  Ada  program  that  created 
them  stops  execution. 


CHAPTER  3 


Compiler  Anomalies  and  Nonconformances 
3.1  Anomalies 

An  anomaly  is  a  test  result  that,  given  the  pre-validation 
analysis,  was  not  expected  during  formal  validation  but 
which  is  judged  allowable  by  the  AVF  and  the  AVO  under  the 
circumstances  of  the  validation.  No  anomalies  were  detected 
in  this  validation  attempt. 


3.2  Nonconformances 

Any  discrepancy  between  expected  test  results  and  actual 
test  results  is  considered  to  be  a  nonconformance.  No  non¬ 
conformances  were  detected  in  this  validation  attempt. 


CHAPTER  4 


ADDITIONAL  TESTING  INFORMATION 

4.1  Pre-Validation 

Prior  to  validation,  a  set  of  test  results  for  ACVC  1.7  pro¬ 
duced  by  TeleSoft  Ada,  Version  3.7,  was  submitted  to  IABG 
m.b.H.,  Dept  SZT  by~the  applicant  for  pre-validation  review. 
Analysis  of  these  results  demonstrated  that  the  compiler 
successfully  passed  all  applicable  tests. 


4.2  Test  Site 

Tests  were  compiled  and  executed  at  Nynashamn  on  two  identi¬ 
cal  computers . 


4.3  Test  Tape  Information 

A  test  tape  containing  ACVC  Version  1.7  was  taken  on-site  by 
the  validation  team.  This  tape  contained  all  tests  applica¬ 
ble  to  this  validation  as  well  as  all  tests  inapplicable  to 
this  validation.  Tests  that  make  use  of  values  that  are 
specific  to  the  implementation  were  customized.  The  test 
suite  was  read  from  a  tape.  Files  were  structured  into 
directories  according  to  LRI-1  chapters  and  test  categories. 


4.4  Testing  Logistics 

Once  all  tests  had  been  loaded  to  disk,  processing  was  begun 
using  a  test  driver  routine  provided  by  the  applicant.  The 
test  driver,  a  UNIX  shell  program,  initiates  the  commands  to 
compile,  link,  and  execute  Ada  programs  dynamically  while 
processing  the  file  directory. 

The  compiler  supports  various  options  that  control  its 
operation.  The  compiler  was  tested  with  the  following 
option  settings. 


Compiler  Option  Information 


Basic  Information 

The  compilation  process  consists  of  5  definite  passes  or  steps: 
Front-End: 

Language  control,  translation  to  intermediate  High-Form. 

Middle  Pass: 

Resolution  of  tasking,  translation  to  intermediate  Low  Form. 

Code  Generator: 

Generation  of  native  code  for  the  target. 

Prelinker: 

Generation  of  elaboration  code  for  main  program. 

Linker: 

The  native  UNIX  linker  (Id)  is  used  to  link  the  object  modules  gen¬ 
erated  by  the  compiler. 

Belov  the  switches  of  the  different  passes  are  tabulated.  The  switches 
pertinent  to  the  UNIX  linker  are  however  not  treated  here. 


Front-End  Switches 

Name 

(default) 

Effect 

Error  File 

(  +  ) 

Error  file 

To  Output 

<  +  ) 

List  to  standard  output 

Dots 

(-) 

Display  one  dot  per  line  scanned 

Comments 

(-) 

Pass  comments  to  sematics 

Notify 

(♦) 

Ask  user  for  action  at  error 

Verbose 

(+) 

Verbose  output 

Long_Integers 

(-) 

Declare  Long  Integer  when  generating 
package  standard. 

32bit  Integers 

(-) 

Define  type  Integer  with  32  bits  when 
generating  package  standard. 

Long_Float 

(-) 

Declare  Long_Float  when  generating 
package  standard. 

D_Format 

(-) 

Define  type  Long  Float  with  DEC  d  format 
when  generating  package  standard.” 

Fe  Max  Pages 

1500 

Pages  in  memory 

Context 

1 

Lines  of  context  in  errors 

Recovery  Level 

50 

Tokens  of  context  in  error  recovery 

Message  Level 

0 

Verboseness  of  error  messages 

(to  be  continued) 
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Pront-End  Switches 


Name 

(default) 

Effect 

Abort  Syntax  Count 

Max  #  before  aborting  compiler 

Abort~Warning  Count 

999 

Max  #  before  aborting  compiler 

Abort  Semantic  Count 

999 

Max  1  before  aborting  compiler 

Quit  Syntax  Count 

999 

Max  1  before  aborting  compiler 

Quit  Warning  Count 

999 

Max  i  before  aborting  compiler 

Quit  Semantic  Count 

999 

Max  #  before  aborting  compiler 

Warnings 

(+) 

Display  warning  messages 

Fe  Debug 

it  ii 

Debug  set 

Console  Name 

"<stdout> : " 

Name  of  Console 

Console  Form 

II  II 

Form  of  Console 

Keyboard  Name 

"<stdin> : " 

Name  of  Keyboard 

Keyboard  Form 

If  If 

Form  of  Keyboard 

Error  Name 

"errors" 

Name  of  list  file 

Error  Form 

It  If 

Form  of  list  file 

Table  Name 

"fe  codesptable" 

Name  of  parse  table 

Table  Form 

II  II 

Form  of  parse  table 

Info  Name 

"ainfo" 

Name  of  Info  file 

Info  Form 

If  It 

Form  of  Info  file 

Message  Name 

"fe  code:mfile" 

Name  of  error  message  file 

Message  Form 

If  II 

Form  of  error  message  file 

Li  bis t  Name 

"liblst" 

Name  of  library  file 

Liblst  Form 

It  II 

Form  of  library  file 

mpp 

(-) 

(obsolete) 

mpp  trix 

(-) 

(obsolete) 

lock 

true 

Controls  updating  of  Ada  library 

Standard 

(-) 

Generate  package  Standard. 

Source  Name 

II II 

Name  of  Source  file 

Source~Form 

II  II 

Form  of  Source  file 

Help 

(-) 

Display  this  text 

Middle  Pass  Switches 

Name 

(default) 

Effect 

check 

(-) 

Check  for  MPST  Node  Already  Exists 

debug 

(-) 

Turn  on  debugging  output 

fe  debug 

II  It 

Turn  on  debugging  output  for  FE  packages 

liSlst 

"liblst" 

Name  of  sublibrary  list  file 

max  pages 

1000 

Virtual  space  pages  (like  fe  max  pages) 

mp  verbose 

(  +  ) 

Display  version,  copyright 

standard 

(-) 

Compile  standard 

varc 

II  ft 

Various  effects,  depending  on  arguments 

vri  te 

(-) 

Write  LF  even  if  an  error  occurred 

Code- 

■Generator  Svitches 

Name 

(default) 

Effect 

d 

(-) 

Debug  switch,  generates  debug  info 
for  debugger. 

e 

(-) 

Generate  execution  profile 
information. 

i 

(  +  ) 

Interactive  switch,  asks  action 
in  case  of  error. 

l*<name> 

(-) 

Creates  an  assemble  list  with 
desired  name. 

1 

(-) 

Creates  an  assemble  list  with 
default  name  (  . s). 

lib»<name> 

"liblst" 

Defines  the  library  list  file. 

mode»<mode> 

"restore" 

Determines  the  mode  to  open 
the  library. 

n<»name> 

(-) 

Creates  labels  with  name  <name>lineno  for 
each  line. 

n 

(-) 

Creates  labels  with  default  names 
(S<line  no>). 

o«<name> 

"<cmpu  name>.o" 

Create  an  object  file  with  name  <name>. 

p«<digi ts> 

"1U240" 

Use  literal  pool  of  size  <digits>. 

q 

(-) 

Do  the  job  quietly. 

r<=word> 

(-) 

Produce  relative  addresses. 

Default  is  absolute. 

s 

(  +  ) 

Give  source  info  (line  no)  when  reporting 
exceptions. 

shadow 

(+) 

Variable  shadowing  desired. 

slf 

(-) 

Check  the  code  generator, 
prints  SLF-instructions . 

stack 

(-) 

Suppress  checking  on  stack 
expansion  for  overflow. 

t«<name> 

(-) 

Source  file;  listing  with  source 
lines  desired. 

v-<digits> 

"1500" 

Virtual  memory  pages  size. 

c 

(-) 

Use  CHK  instr  when  applicable. 

m«<targeting> 

"mc68000" 

Choose  target  machine  (MC68k  family). 

Name 

lib*<name> 

1 

o-<name> 

q 

r 

v-<digi ts> 


Prelinker  Svitches 
(default)  Effect 

"liblst"  Names  the  library  file. 

(  +  )  Produce  link  script, 

"tsamain.o"  Names  the  main  object  file. 

(-)  Do  the  job  quietly. 

(♦)  Recompile  inconsistent  units. 

"lJOC*  Virtual  memory  pages  size. 


Options  used  in  compiling  ACVC  tests: 


Front  End 

-to  output 

No  list  is  generated 

-noli f y 

Continue  on  error 

Fe  max  pages 

1500 

others 

-default 

Middle  Pass 

+varc-petz 

Controls  allocation  and  alignment 

-notify 

Continue  on  error 

max  pages 

1500 

others 

-default 

Code  Gen  and  Prelinker 

-I 

No  assembly  list  generated  (code  gen) 

-1 

No  link  script  generated  (prelinker) 

-i 

No  interactive  execution 

-r 

No  recompilation  of  inconsistent  units  (prelinker) 

V 

1500 

others 

-default 

Test  were  run  on  two  machines  simulataneously  starting  with 
the  B-Tests.  On  each  machine  a  batch  queue  was  used.  For 
each  test  a  new  program  library  was  created  containing  the 
standard  Ada  package  and  the  ACVC  support  packages  and  pro¬ 
cedures.  The  report  package  was  modified  in  order  to  print 
the  date  and  time  of  test  execution.  For  each  chapter  the 
compiler  listings  and  the  results,  if  any,  were  written  to 
individual  files.  These  files  were  written  on  tape  in  UNIX 
dd  format  and  archived. 


4-5  Testing  Duration 

The  ACVC  has  not  been  designed  for  use  in  measuring  compiler 
performance.  However,  information  about  the  length  of  time 
needed  to  test  the  compiler  may  characterize  compiler  per¬ 
formance  in  processing  a  large  number  of  programs. 

Testing  started  in  the  afternoon  of  86-04-11  and  was  com¬ 
pleted  in  the  morning  of  86-04-20.  Testing  was  interrupted 
twice  for  a  total  of  about  20  hours. 


CHAPTER  5 


SUMMARY  AND  CONCLUSIONS 

The  IABG  m.b.H.,  Dept  SZT,  identified  1993  of  the  2286  tests 
in  Version  1.7  of  the  Ada  Compiler  Validation  Capability  to 
be  processed  during  the  validation  of  TeleSoft_Ada  including 
7  tests  for  the  report  package.  Out  of  the  1993  tests,  one 
was  withdrawn  because  of  test  errors  (15  tests  were  with¬ 
drawn  previously),  28  were  ruled  inapplicable,  and  the  other 
1964  were  passed  by  the  compiler. 

The  IABG  m.b.H.,  Dept  SZT  concludes  that  these  results 
demonstrate  acceptable  conformance  to  the  Ada  Standard. 


APPENDIX  A 


COMPLIANCE  STATEMENT 


The  only  allowed  implementation  dependencies  correspond  to 
implementation-dependent  pragmas  and  attributes,  to  certain 
machine-dependent  conventions  as  mentioned  in  Chapter  13  of 
MIL-STD-1 81 5A,  and  to  certain  allowed  restrictions  on 
representation  classes.  The  implementation-dependent  charac¬ 
teristics  of  the  TeleSoft_Ada  are  described  in  the  following 
sections  which  discuss  topics  one  through  eight  as  stated  in 
Appendix  F  of  the  Ada  Language  Reference  Manual  (ANSI/MIL- 
STD-181 5A) . 


1.  Implementation  Dependent  Pragmas 

There  is  one  implementation-defined  pragma,  COMMENT.  It  has  the  form: 
pragma  C0MMENT(  <string_literal>  ); 

It  may  only  appear  within  a  compilation  unit  and  has  the  effect  of 
embedding  the  given  sequence  of  characters  in  the  object  code  of  the 
compilation  unit. 


2.  Implementation  Dependent  Attributes 

There  are  no  implementation  dependent  attributes. 


3.  Specification  of  Package  SYSTEM 


PACKAGE  System  IS 

SUBTYPE  Byte  is  Natural  range  0  ..  255; 

TYPE  Address  is  ACCESS  Integer; 

TYPE  Subprogram_Value  is  PRIVATE; 

TYPE  Name  IS  (TeleSof t_Ada) ; 

System_Name  :  CONSTANT  name  TeleSof t_Ada; 

Storage_Unit  :  CONSTANT  :*  8; 

Memory_Size  s  CONSTANT  :=  (2  **  24)  -  1; 

—  System-Dependent  Named  Numbers: 

Min  Int  :  CONSTANT  :-  -(2  **  31); 

Max'lnt  :  CONSTANT  :=.  (2  **  31)  -  1; 

Max  Digits  :  CONSTANT  6; 

MaxMantissa  :  CONSTANT  :«  31; 

Fine  Delta  :  CONSTANT  :■  1.0  /  (2  **  (Max_Mantissa  -  1)); 
Tick'  :  CONSTANT  10.0E-3; 

—  Other  System-Dependent  Declarations 

SUBTYPE  Priority  IS  Integer  RANGE  0  ..  63; 

Max_Object_Size  :  CONSTANT  :*  Max  Int; 

Max~Record_Count  :  CONSTANT  :-  Max'lnt; 

Max  Text  Io  Count  :  CONSTANT  :=  Max'lnt  -  1; 
Max'Text'lo'Field  :  CONSTANT  :=  lOOS; 

PRIVATE 

TYPE  Subprogram  Value  is 
record 


Proc_addr  :  Address; 
StatTc_link  :  Address; 
Global  frame  :  Address; 
end  recorH; 

END  System; 


4.  Restrictions  on  Representation  Clauses 

The  compiler  supports  the  following  representation  clauses: 

Length  Clauses:  for  tasks  ' ST0RAGE_SI2E  (LRM  13.2(C)). 

Address  Clauses:  for  objects  and  entries  (LRM  13.5) 

5.  Implementation  dependent  naming  conventions 

There  are  no  implementation-generated  names  denoting  implementation 
dependent  components. 

6.  Interpretation  of  expressions  in  address  clauses 

Expressions  that  appear  in  address  specifications  are  interpreted  as  the 
first  storage  unit  of  the  object. 

7.  Restrictions  on  Unchecked  Conversions 

Unchecked  conversions  are  allowed  between  variables  of  types  (or  sub- 
types)  T1  and  T2  provided  that  1)  they  have  the  same  static  size,  2) 
they  are  not  unconstrained  array  types,  and  3)  they  are  not  private 
(unless  they  are  subtypes  of  or  are  derived  from  type  SYSTEM. ADDRESS) . 

8.  I/O  Package  Characteristics 

Instantiations  of  DIRECT_I0  and  SEQUENTIAL_IO  are  supported  with  the 
following  exceptions, 

o  unconstrained  array  types 

o  unconstrained  types  with  discriminants  without  default  values. 

Calling  CREATE  with  a  name  of  an  existing  external  file  does  not 
raise  an  exception  (the  old  file  is  overwritten). 

In  DIRECT_I0  the  type  COUNT  is  defined  as  follows: 

type  COUNT  is  range  0  ..  16#7FFFFFFF#; 

In  TEXT_IO  the  type  COUNT  is  defined  as  follows: 

type  COUNT  is  range  0  ..  16I7FFFFFFD# ; 

In  TEXT_I0  the  subtype  FIELD  is  defined  as  follows: 

type  FIELD  is  INTEGER  range  0  ..  1000; 
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9.  Package  standard 

The  package  standard  used  for  this  compiler  corresponds 
to  the  specification  given  in  LRM  Appendix  C.  The  imple¬ 
mentation  dependent  parts  are  implemented  as  follows: 

type  integer  is  range  -32768 ..  32767  ; 

type  long_integer  is  range  -2  1  47483648 .. 2 1 47483647 : 
type  float  is  digits  6  range 

-2#0. 1  .  .  .  .  1  #E1  28.  .  2#0. 1 - lfcl  28; 

24  24 

type  duration  is  delta  2,tl#E-14  range  -86400  ..  86400 . 0  : 

10.  File  naming  conventions 

There  are  no  restrictions  on  file  names  other  than  those 
imposed  by  the  operating  system. 
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APPENDIX  B 


TEST  PARAMETERS 


Certain  tests  in  the  ACVC  make  use  of  implementation- 
dependent  values,  such  as  the  maximum  length  of  an  input 
line  and  invalid  file  names.  A  test  that  makes  use  of  such 
values  is  identified  by  the  extension  .TST  in  its  file  name. 
Actual  values  to  be  substituted  are  identified  by  names  that, 
begin  with  a  dollar  sign.  A  value  is  substituted  for  each 
of  these  names  before  the  test  is  run.  The  values  used  for 
this  validation  are  given  below. 


>MAX_IN_LEN 

>BIG_ID1 

5BIG_ID2 

$BIG_ID3 

5NEG_BASED_INT 

)BIG_INT_LIT 

5BIG_REAL_LIT 

>EXTENDED_ASCII_CHARS 

>NON_ASCI I_CHAR_TYPE 
> BLANKS 
>MAX_DIGITS 
>NAHf 

>INTEGER_FIRST 

JINTEGER~LAST 

>MAX_INT~ 

5LESS_THAN_DURATI0N 

jGREATER__THAN_DURATI  ON 

>LESS_THAN_DURATION_BASE_FIRST 

■>GREATER_THAN_DURATION_BASE_LAST 

>COUNT_LAST 

>FIELD_LAST 

Jfile_name_vith_bad_chars 

>FILE~NAME_WITH~WILD_CARD_CHAR 

3ILLEGAL_EXTERNAL_FILEjlAMEl 

)ILLEGAL~EXTERNAL~FILE~NAME2 


String(l 

TTIi 

roy".  (i:a< 

)9  ->  'A'  , 

200  ->  ' 

1') 

String(l 

TT2i 

DO)  (TTTT* 

)9  ->  'A' , 

200  ->  ' 

2') 

String(l 

TTIi 

DO)  (1.  .  1( 

)0  ->  '  A'T 

101  ->  ' 

3', 

102.. 200  -> 

'A'  ) 

String(l 

TTIi 

DO)  (l..l( 

)0  ->  'A' , 

101  ->  ' 

4S 

102.. 200  -> 

'A'  ) 

16# FFFFFFFE# 

Stnng(  1 

.  .2 ( 

DO)  <1. . IS 

)7  ->  '0' , 

198. .200 

-> 

”298") 

String( 1 

TTIi 

DO)  :«  (l..l< 

)4  ->  '0' , 

195. .200 

-> 

"69.0E1") 

"abcdef g 

hi  jl 

<.lmnopqrstuwx 

yz!$Z?@[\r 

(N0N_NULL) 

String( 1 

..li 

30)  :=  (l..l£ 

50  =>  '  ') 

No  such  numeric  type  -  long  in- 
teger  used 


-2**31 ; 

2**31-) 

- 86  40) 


L3l_0 7  2 . ( 
)**31-2'; 


"X}  ]  ! /(§#%$' &~Y*’ 
"XYZ*" 

" BAD-CHARACTER^/*' 
"AAA/AAA '* 


■‘.‘■V-h'S'.v 


APPENDIX  C 


COMMAND  SCRIPTS 


Command  scripts  used 
the  validation  team, 


for  this  validation  were  reviewed  by 
but  are  not  released  for  publication. 


